home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / SecalDemo / Inc / libcalls / expansion.inc < prev    next >
Text File  |  1998-06-24  |  4KB  |  157 lines
  1. pattern AddConfigDev(_configDev) is
  2.     push a6;
  3.     a0:=_configDev;
  4.     a6:=ExpansionBase; jsr [a6-30];
  5.     pop a6;
  6. endp;                                                            # ADDCONFIGDEV
  7.  
  8. pattern AddBootNode(_bootPri,_flags,_deviceNode,_configDev) is
  9.     push a6;
  10.     safe d0.l:=_bootPri; d1.l:=_flags; a0:=_deviceNode; a1:=_configDev;;
  11.     a6:=ExpansionBase; jsr [a6-36];
  12.     pop a6;
  13. endp;                                                            # ADDBOOTNODE
  14.  
  15. pattern AllocBoardMem(_slotSpec) is
  16.     push a6;
  17.     d0.l:=_slotSpec;
  18.     a6:=ExpansionBase; jsr [a6-42];
  19.     pop a6;
  20. endp;                                                            # ALLOCBOARDMEM
  21.  
  22. pattern AllocConfigDev is
  23.     push a6;
  24.     a6:=ExpansionBase; jsr [a6-48];
  25.     pop a6;
  26. endp;                                                            # ALLOCCONFIGDEV
  27.  
  28. pattern AllocExpansionMem(_numSlots,_slotAlign) is
  29.     push a6;
  30.     safe d0.l:=_numSlots; d1.l:=_slotAlign;;
  31.     a6:=ExpansionBase; jsr [a6-54];
  32.     pop a6;
  33. endp;                                                            # ALLOCEXPANSIONMEM
  34.  
  35. pattern ConfigBoard(_board,_configDev) is
  36.     push a6;
  37.     safe a0:=_board; a1:=_configDev;;
  38.     a6:=ExpansionBase; jsr [a6-60];
  39.     pop a6;
  40. endp;                                                            # CONFIGBOARD
  41.  
  42. pattern ConfigChain(_baseAddr) is
  43.     push a6;
  44.     a0:=_baseAddr;
  45.     a6:=ExpansionBase; jsr [a6-66];
  46.     pop a6;
  47. endp;                                                            # CONFIGCHAIN
  48.  
  49. pattern FindConfigDev(_oldConfigDev,_manufacturer,_product) is
  50.     push a6;
  51.     safe a0:=_oldConfigDev; d0.l:=_manufacturer; d1.l:=_product;;
  52.     a6:=ExpansionBase; jsr [a6-72];
  53.     pop a6;
  54. endp;                                                            # FINDCONFIGDEV
  55.  
  56. pattern FreeBoardMem(_startSlot,_slotSpec) is
  57.     push a6;
  58.     safe d0.l:=_startSlot; d1.l:=_slotSpec;;
  59.     a6:=ExpansionBase; jsr [a6-78];
  60.     pop a6;
  61. endp;                                                            # FREEBOARDMEM
  62.  
  63. pattern FreeConfigDev(_configDev) is
  64.     push a6;
  65.     a0:=_configDev;
  66.     a6:=ExpansionBase; jsr [a6-84];
  67.     pop a6;
  68. endp;                                                            # FREECONFIGDEV
  69.  
  70. pattern FreeExpansionMem(_startSlot,_numSlots) is
  71.     push a6;
  72.     safe d0.l:=_startSlot; d1.l:=_numSlots;;
  73.     a6:=ExpansionBase; jsr [a6-90];
  74.     pop a6;
  75. endp;                                                            # FREEEXPANSIONMEM
  76.  
  77. pattern ReadExpansionByte(_board,_offset) is
  78.     push a6;
  79.     safe a0:=_board; d0.l:=_offset;;
  80.     a6:=ExpansionBase; jsr [a6-96];
  81.     pop a6;
  82. endp;                                                            # READEXPANSIONBYTE
  83.  
  84. pattern ReadExpansionRom(_board,_configDev) is
  85.     push a6;
  86.     safe a0:=_board; a1:=_configDev;;
  87.     a6:=ExpansionBase; jsr [a6-102];
  88.     pop a6;
  89. endp;                                                            # READEXPANSIONROM
  90.  
  91. pattern RemConfigDev(_configDev) is
  92.     push a6;
  93.     a0:=_configDev;
  94.     a6:=ExpansionBase; jsr [a6-108];
  95.     pop a6;
  96. endp;                                                            # REMCONFIGDEV
  97.  
  98. pattern WriteExpansionByte(_board,_offset,_byte) is
  99.     push a6;
  100.     safe a0:=_board; d0.l:=_offset; d1.l:=_byte;;
  101.     a6:=ExpansionBase; jsr [a6-114];
  102.     pop a6;
  103. endp;                                                            # WRITEEXPANSIONBYTE
  104.  
  105. pattern ObtainConfigBinding is
  106.     push a6;
  107.     a6:=ExpansionBase; jsr [a6-120];
  108.     pop a6;
  109. endp;                                                            # OBTAINCONFIGBINDING
  110.  
  111. pattern ReleaseConfigBinding is
  112.     push a6;
  113.     a6:=ExpansionBase; jsr [a6-126];
  114.     pop a6;
  115. endp;                                                            # RELEASECONFIGBINDING
  116.  
  117. pattern SetCurrentBinding(_currentBinding,_bindingSize) is
  118.     push a6;
  119.     safe a0:=_currentBinding; d0.l:=_bindingSize;;
  120.     a6:=ExpansionBase; jsr [a6-132];
  121.     pop a6;
  122. endp;                                                            # SETCURRENTBINDING
  123.  
  124. pattern GetCurrentBinding(_currentBinding,_bindingSize) is
  125.     push a6;
  126.     safe a0:=_currentBinding; d0.l:=_bindingSize;;
  127.     a6:=ExpansionBase; jsr [a6-138];
  128.     pop a6;
  129. endp;                                                            # GETCURRENTBINDING
  130.  
  131. pattern MakeDosNode(_parmPacket) is
  132.     push a6;
  133.     a0:=_parmPacket;
  134.     a6:=ExpansionBase; jsr [a6-144];
  135.     pop a6;
  136. endp;                                                            # MAKEDOSNODE
  137.  
  138. pattern AddDosNode(_bootPri,_flags,_deviceNode) is
  139.     push a6;
  140.     safe d0.l:=_bootPri; d1.l:=_flags; a0:=_deviceNode;;
  141.     a6:=ExpansionBase; jsr [a6-150];
  142.     pop a6;
  143. endp;                                                            # ADDDOSNODE
  144.  
  145. pattern expansionPrivate1 is
  146.     push a6;
  147.     a6:=ExpansionBase; jsr [a6-156];
  148.     pop a6;
  149. endp;                                                            # EXPANSIONPRIVATE1
  150.  
  151. pattern expansionPrivate2 is
  152.     push a6;
  153.     a6:=ExpansionBase; jsr [a6-162];
  154.     pop a6;
  155. endp;                                                            # EXPANSIONPRIVATE2
  156.  
  157.